home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 30 / PC Gamer IT CD 30 1-2.iso / MOTS / GAMEDATA / RESOURCE / JKMRES.GOO / cog_00_bloodtrail.cog < prev    next >
Text File  |  1998-02-25  |  1KB  |  49 lines

  1. # Jedi Knight Cog Script
  2. #
  3. # 00_BLOODTRAIL.COG
  4. #
  5. # Leave a blood trail behind a severed limb
  6. #
  7. # [YB]
  8. #
  9. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  10.  
  11. flags=0x240
  12.  
  13. symbols
  14.  
  15. template    blood=+limb_blood                local
  16. int         dummy                            local
  17.  
  18. message     created
  19. message     pulse
  20. message     timer
  21.  
  22. end
  23.  
  24. # ========================================================================================
  25.  
  26. code
  27. created:
  28.    SetThingPulse(GetSenderRef(), 0.05);            // set 50 msec timer for blood release
  29.    SetTimerEx(1.1, GetSenderRef(), 0, 0);          // cut it after 1.1 seconds
  30.    Return;
  31.  
  32. # ........................................................................................
  33.  
  34. pulse:
  35.    dummy = CreateThing(blood, GetSenderRef());     // create blood at our current location
  36.  
  37.    Return;
  38.  
  39. # ........................................................................................
  40.  
  41. timer:
  42.    SetThingPulse(GetSenderId(), 0);
  43.  
  44.    Return;
  45.  
  46. end
  47.  
  48.  
  49.